<!DOCTYPE html>
<html lang="en">
  <head>
    <meta charset="utf-8">
    <meta http-equiv="X-UA-Compatible" content="IE=edge">
    <meta name="viewport" content="width=device-width, initial-scale=1">
    <title>Memoize::Expire - Plug-in module for automatic expiration of memoized values - Perldoc Browser</title>
    <link rel="search" href="https://perldoc.perl.org/opensearch.xml" type="application/opensearchdescription+xml" title="Perldoc Browser">
    <link rel="canonical" href="https://perldoc.perl.org/Memoize::Expire">
    <link rel="stylesheet" href="https://stackpath.bootstrapcdn.com/bootstrap/4.5.2/css/bootstrap.min.css" integrity="sha384-JcKb8q3iqJ61gNV9KGb8thSsNjpSL0n8PARn9HuZOnIxN0hoP+VmmDGMN5t9UJ0Z" crossorigin="anonymous">
    <link rel="stylesheet" href="https://cdnjs.cloudflare.com/ajax/libs/highlight.js/10.5.0/styles/stackoverflow-light.min.css" integrity="sha512-cG1IdFxqipi3gqLmksLtuk13C+hBa57a6zpWxMeoY3Q9O6ooFxq50DayCdm0QrDgZjMUn23z/0PMZlgft7Yp5Q==" crossorigin="anonymous" />
    <style>
      body {
        background: #f4f4f5;
        color: #020202;
      }
      .navbar-dark {
        background-image: -webkit-linear-gradient(top, #005f85 0, #002e49 100%);
        background-image: -o-linear-gradient(top, #005f85 0, #002e49 100%);
        background-image: linear-gradient(to bottom, #005f85 0, #002e49 100%);
        filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ff005f85', endColorstr='#ff002e49', GradientType=0);
        background-repeat: repeat-x;
      }
      .navbar-dark .navbar-nav .nav-link,
      .navbar-dark .navbar-nav .nav-link:focus { color: #fff }
      .navbar-dark .navbar-nav .nav-link:hover { color: #ffef68 }
      #wrapperlicious {
        margin: 0 auto;
        font: 0.9em 'Helvetica Neue', Helvetica, sans-serif;
        font-weight: normal;
        line-height: 1.5em;
        margin: 0;
        padding: 0;
      }
      #wrapperlicious h1 { font-size: 1.5em }
      #wrapperlicious h2 { font-size: 1.3em }
      #wrapperlicious h3 { font-size: 1.1em }
      #wrapperlicious h4 { font-size: 0.9em }
      #wrapperlicious h1, #wrapperlicious h2, #wrapperlicious h3,
      #wrapperlicious h4, #wrapperlicious dt {
        color: #020202;
        margin-top: 1em;
        margin-bottom: 1em;
        position: relative;
        font-weight: bold;
      }
      #wrapperlicious a { color: inherit; text-decoration: underline }
      #wrapperlicious #toc { text-decoration: none }
      #wrapperlicious a:hover { color: #2a2a2a }
      #wrapperlicious a img { border: 0 }
      #wrapperlicious :not(pre) > code {
        color: inherit;
        background-color: rgba(0, 0, 0, 0.04);
        border-radius: 3px;
        font: 0.9em Consolas, Menlo, Monaco, monospace;
        padding: 0.3em;
      }
      #wrapperlicious dd {
        margin: 0;
        margin-left: 2em;
      }
      #wrapperlicious dt {
        color: #2a2a2a;
        font-weight: bold;
        margin-left: 0.9em;
      }
      #wrapperlicious p {
        margin-bottom: 1em;
        margin-top: 1em;
      }
      #wrapperlicious li > p {
        margin-bottom: 0;
        margin-top: 0;
      }
      #wrapperlicious pre {
        border: 1px solid #c1c1c1;
        border-radius: 3px;
        font: 100% Consolas, Menlo, Monaco, monospace;
        margin-bottom: 1em;
        margin-top: 1em;
      }
      #wrapperlicious pre > code {
        display: block;
        background-color: #f6f6f6;
        font: 0.9em Consolas, Menlo, Monaco, monospace;
        line-height: 1.5em;
        text-align: left;
        white-space: pre;
        padding: 1em;
      }
      #wrapperlicious dl, #wrapperlicious ol, #wrapperlicious ul {
        margin-bottom: 1em;
        margin-top: 1em;
      }
      #wrapperlicious ul {
        list-style-type: square;
      }
      #wrapperlicious ul ul {
        margin-bottom: 0px;
        margin-top: 0px;
      }
      #footer {
        font-size: 0.8em;
        padding-top: 0.5em;
        text-align: center;
      }
      #more {
        display: inline;
        font-size: 0.8em;
      }
      #perldocdiv {
        background-color: #fff;
        border: 1px solid #c1c1c1;
        border-bottom-left-radius: 5px;
        border-bottom-right-radius: 5px;
        margin-left: auto;
        margin-right: auto;
        padding: 3em;
        padding-top: 1em;
        max-width: 960px;
      }
      #moduleversion { float: right }
      #wrapperlicious .leading-notice {
        font-style: italic;
        padding-left: 1em;
        margin-top: 1em;
        margin-bottom: 1em;
      }
      #wrapperlicious .permalink {
        display: none;
        left: -0.75em;
        position: absolute;
        padding-right: 0.25em;
        text-decoration: none;
      }
      #wrapperlicious h1:hover .permalink, #wrapperlicious h2:hover .permalink,
      #wrapperlicious h3:hover .permalink, #wrapperlicious h4:hover .permalink,
      #wrapperlicious dt:hover .permalink {
        display: block;
      }
    </style>
    <!-- Global site tag (gtag.js) - Google Analytics -->
    <script async src="https://www.googletagmanager.com/gtag/js?id=G-KVNWBNT5FB"></script>
    <script>
      window.dataLayer = window.dataLayer || [];
      function gtag(){dataLayer.push(arguments);}
      gtag('js', new Date());

      gtag('config', 'G-KVNWBNT5FB');
      gtag('config', 'UA-50555-3');
    </script>
  </head>
  <body>
    <nav class="navbar navbar-expand-md navbar-dark bg-dark justify-content-between">
  <button class="navbar-toggler" type="button" data-toggle="collapse" data-target="#navbarNav" aria-controls="navbarNav" aria-expanded="false" aria-label="Toggle navigation">
    <span class="navbar-toggler-icon"></span>
  </button>
  <a class="navbar-brand" href="https://perldoc.perl.org/">Perldoc Browser</a>
  <div class="collapse navbar-collapse" id="navbarNav">
    <ul class="navbar-nav mr-auto">
      <li class="nav-item dropdown text-nowrap">
        <a class="nav-link dropdown-toggle" href="./Memoize::Expire.html#" id="dropdownlink-stable" role="button" data-toggle="dropdown" aria-haspopup="true" aria-expanded="false">5.35.0</a>
        <div class="dropdown-menu" aria-labelledby="dropdownlink-stable">
          <a class="dropdown-item" href="https://perldoc.perl.org/Memoize::Expire">Latest</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.38.2/Memoize::Expire">5.38.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.38.1/Memoize::Expire">5.38.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.38.0/Memoize::Expire">5.38.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.36.3/Memoize::Expire">5.36.3</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.36.2/Memoize::Expire">5.36.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.36.1/Memoize::Expire">5.36.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.36.0/Memoize::Expire">5.36.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.34.3/Memoize::Expire">5.34.3</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.34.2/Memoize::Expire">5.34.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.34.1/Memoize::Expire">5.34.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.34.0/Memoize::Expire">5.34.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.32.1/Memoize::Expire">5.32.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.32.0/Memoize::Expire">5.32.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.30.3/Memoize::Expire">5.30.3</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.30.2/Memoize::Expire">5.30.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.30.1/Memoize::Expire">5.30.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.30.0/Memoize::Expire">5.30.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.28.3/Memoize::Expire">5.28.3</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.28.2/Memoize::Expire">5.28.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.28.1/Memoize::Expire">5.28.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.28.0/Memoize::Expire">5.28.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.26.3/Memoize::Expire">5.26.3</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.26.2/Memoize::Expire">5.26.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.26.1/Memoize::Expire">5.26.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.26.0/Memoize::Expire">5.26.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.24.4/Memoize::Expire">5.24.4</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.24.3/Memoize::Expire">5.24.3</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.24.2/Memoize::Expire">5.24.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.24.1/Memoize::Expire">5.24.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.24.0/Memoize::Expire">5.24.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.22.4/Memoize::Expire">5.22.4</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.22.3/Memoize::Expire">5.22.3</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.22.2/Memoize::Expire">5.22.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.22.1/Memoize::Expire">5.22.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.22.0/Memoize::Expire">5.22.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.20.3/Memoize::Expire">5.20.3</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.20.2/Memoize::Expire">5.20.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.20.1/Memoize::Expire">5.20.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.20.0/Memoize::Expire">5.20.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.18.4/Memoize::Expire">5.18.4</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.18.3/Memoize::Expire">5.18.3</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.18.2/Memoize::Expire">5.18.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.18.1/Memoize::Expire">5.18.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.18.0/Memoize::Expire">5.18.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.16.3/Memoize::Expire">5.16.3</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.16.2/Memoize::Expire">5.16.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.16.1/Memoize::Expire">5.16.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.16.0/Memoize::Expire">5.16.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.14.4/Memoize::Expire">5.14.4</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.14.3/Memoize::Expire">5.14.3</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.14.2/Memoize::Expire">5.14.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.14.1/Memoize::Expire">5.14.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.14.0/Memoize::Expire">5.14.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.12.5/Memoize::Expire">5.12.5</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.12.4/Memoize::Expire">5.12.4</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.12.3/Memoize::Expire">5.12.3</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.12.2/Memoize::Expire">5.12.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.12.1/Memoize::Expire">5.12.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.12.0/Memoize::Expire">5.12.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.10.1/Memoize::Expire">5.10.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.10.0/Memoize::Expire">5.10.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.8.9/Memoize::Expire">5.8.9</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.8.8/Memoize::Expire">5.8.8</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.8.7/Memoize::Expire">5.8.7</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.8.6/Memoize::Expire">5.8.6</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.8.5/Memoize::Expire">5.8.5</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.8.4/Memoize::Expire">5.8.4</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.8.3/Memoize::Expire">5.8.3</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.8.2/Memoize::Expire">5.8.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.8.1/Memoize::Expire">5.8.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.8.0/Memoize::Expire">5.8.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.6.2/Memoize::Expire">5.6.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.6.1/Memoize::Expire">5.6.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.6.0/Memoize::Expire">5.6.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.005_04/Memoize::Expire">5.005_04</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.005_03/Memoize::Expire">5.005_03</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.005_02/Memoize::Expire">5.005_02</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.005_01/Memoize::Expire">5.005_01</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.005/Memoize::Expire">5.005</a>
        </div>
      </li>
      <li class="nav-item dropdown text-nowrap">
        <a class="nav-link dropdown-toggle" href="./Memoize::Expire.html#" id="dropdownlink-dev" role="button" data-toggle="dropdown" aria-haspopup="true" aria-expanded="false">Dev</a>
        <div class="dropdown-menu" aria-labelledby="dropdownlink-dev">
          <a class="dropdown-item" href="https://perldoc.perl.org/blead/Memoize::Expire">blead</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.39.6/Memoize::Expire">5.39.6</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.39.5/Memoize::Expire">5.39.5</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.39.4/Memoize::Expire">5.39.4</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.39.3/Memoize::Expire">5.39.3</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.39.2/Memoize::Expire">5.39.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.39.1/Memoize::Expire">5.39.1</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.38.0-RC2/Memoize::Expire">5.38.0-RC2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.38.0-RC1/Memoize::Expire">5.38.0-RC1</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.37.11/Memoize::Expire">5.37.11</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.37.10/Memoize::Expire">5.37.10</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.37.9/Memoize::Expire">5.37.9</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.37.8/Memoize::Expire">5.37.8</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.37.7/Memoize::Expire">5.37.7</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.37.6/Memoize::Expire">5.37.6</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.37.5/Memoize::Expire">5.37.5</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.37.4/Memoize::Expire">5.37.4</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.37.3/Memoize::Expire">5.37.3</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.37.2/Memoize::Expire">5.37.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.37.1/Memoize::Expire">5.37.1</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.37.0/Memoize::Expire">5.37.0</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.35.11/Memoize::Expire">5.35.11</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.35.10/Memoize::Expire">5.35.10</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.35.9/Memoize::Expire">5.35.9</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.35.8/Memoize::Expire">5.35.8</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.35.7/Memoize::Expire">5.35.7</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.35.6/Memoize::Expire">5.35.6</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.35.5/Memoize::Expire">5.35.5</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.35.4/Memoize::Expire">5.35.4</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.35.3/Memoize::Expire">5.35.3</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.35.2/Memoize::Expire">5.35.2</a>
          <a class="dropdown-item" href="https://perldoc.perl.org/5.35.1/Memoize::Expire">5.35.1</a>
          <a class="dropdown-item active" href="./Memoize::Expire.html">5.35.0</a>
        </div>
      </li>
      <li class="nav-item dropdown text-nowrap">
        <a class="nav-link dropdown-toggle" href="./Memoize::Expire.html#" id="dropdownlink-nav" role="button" data-toggle="dropdown" aria-haspopup="true" aria-expanded="false">Documentation</a>
        <div class="dropdown-menu" aria-labelledby="dropdownlink-nav">
          <a class="dropdown-item" href="perl.html">Perl</a>
          <a class="dropdown-item" href="perlintro.html">Intro</a>
          <a class="dropdown-item" href="perl.html#Tutorials">Tutorials</a>
          <a class="dropdown-item" href="perlfaq.html">FAQs</a>
          <a class="dropdown-item" href="perl.html#Reference-Manual">Reference</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="perlop.html">Operators</a>
          <a class="dropdown-item" href="functions.html">Functions</a>
          <a class="dropdown-item" href="variables.html">Variables</a>
          <a class="dropdown-item" href="modules.html">Modules</a>
          <a class="dropdown-item" href="perlutil.html">Utilities</a>
          <div class="dropdown-divider"></div>
          <a class="dropdown-item" href="perlcommunity.html">Community</a>
          <a class="dropdown-item" href="perlhist.html">History</a>
        </div>
      </li>
    </ul>
    <ul class="navbar-nav">
      <script>
        function set_expand (expand) {
          var perldocdiv = document.getElementById('perldocdiv');
          var width = window.getComputedStyle(perldocdiv).getPropertyValue('max-width');
          var expanded = (width == '' || width == 'none') ? true : false;
          if (expand === null) {
            expand = !expanded;
          }
          if ((expand && !expanded) || (!expand && expanded)) {
            perldocdiv.style.setProperty('max-width', expand ? 'none' : '960px');
            var button_classlist = document.getElementById('content-expand-button').classList;
            if (expand) {
              button_classlist.add('btn-light');
              button_classlist.remove('btn-outline-light');
            } else {
              button_classlist.add('btn-outline-light');
              button_classlist.remove('btn-light');
            }
          }
          return expand;
        }
        function toggle_expand () {
          var expand = set_expand(null);
          document.cookie = 'perldoc_expand=' + (expand ? 1 : 0) + '; path=/; expires=Tue, 19 Jan 2038 03:14:07 UTC';
        }
        function read_expand () {
          return document.cookie.split(';').some(function (item) { return item.indexOf('perldoc_expand=1') >= 0 });
        }
        if (document.readyState === 'loading') {
          document.addEventListener('DOMContentLoaded', function () {
            if (read_expand()) {
              set_expand(true);
            }
          });
        } else if (read_expand()) {
          set_expand(true);
        }
      </script>
      <button id="content-expand-button" type="button" class="btn btn-outline-light d-none d-lg-inline-block mr-2" onclick="toggle_expand()">Expand</button>
    <ul>
    <form class="form-inline" method="get" action="https://perldoc.perl.org/5.35.0/search">
      <input class="form-control mr-3" type="search" name="q" placeholder="Search" aria-label="Search">
    </form>
  </div>
</nav>

    <div id="wrapperlicious" class="container-fluid">
      <div id="perldocdiv">
        <div id="links">
          <a href="./Memoize::Expire.html">Memoize::Expire</a>
          <div id="more">
            (<a href="./Memoize::Expire.txt">source</a>,
            <a href="https://metacpan.org/pod/Memoize::Expire">CPAN</a>)
          </div>
            <div id="moduleversion">version 1.03</div>
        </div>
        <div class="leading-notice">
          You are viewing the version of this documentation from Perl 5.35.0.
            This is a development version of Perl.
        </div>
        <h1><a id="toc">CONTENTS</a></h1>
                  <ul>
              <li>
                <a class="text-decoration-none" href="./Memoize::Expire.html#NAME">NAME</a>
              </li>
              <li>
                <a class="text-decoration-none" href="./Memoize::Expire.html#SYNOPSIS">SYNOPSIS</a>
              </li>
              <li>
                <a class="text-decoration-none" href="./Memoize::Expire.html#DESCRIPTION">DESCRIPTION</a>
              </li>
              <li>
                <a class="text-decoration-none" href="./Memoize::Expire.html#INTERFACE">INTERFACE</a>
              </li>
              <li>
                <a class="text-decoration-none" href="./Memoize::Expire.html#ALTERNATIVES">ALTERNATIVES</a>
              </li>
              <li>
                <a class="text-decoration-none" href="./Memoize::Expire.html#CAVEATS">CAVEATS</a>
              </li>
              <li>
                <a class="text-decoration-none" href="./Memoize::Expire.html#AUTHOR">AUTHOR</a>
              </li>
              <li>
                <a class="text-decoration-none" href="./Memoize::Expire.html#SEE-ALSO">SEE ALSO</a>
              </li>
          </ul>

      <h1 id="NAME"><a class="permalink" href="./Memoize::Expire.html#NAME">#</a>NAME</h1>

<p>Memoize::Expire - Plug-in module for automatic expiration of memoized values</p>

<h1 id="SYNOPSIS"><a class="permalink" href="./Memoize::Expire.html#SYNOPSIS">#</a>SYNOPSIS</h1>

<pre><code>  use Memoize;
  use Memoize::Expire;
  tie my %cache =&gt; &#39;Memoize::Expire&#39;,
	  	     LIFETIME =&gt; $lifetime,    # In seconds
		     NUM_USES =&gt; $n_uses;

  memoize &#39;function&#39;, SCALAR_CACHE =&gt; [HASH =&gt; \%cache ];</code></pre>

<h1 id="DESCRIPTION"><a class="permalink" href="./Memoize::Expire.html#DESCRIPTION">#</a>DESCRIPTION</h1>

<p>Memoize::Expire is a plug-in module for Memoize. It allows the cached values for memoized functions to expire automatically. This manual assumes you are already familiar with the Memoize module. If not, you should study that manual carefully first, paying particular attention to the HASH feature.</p>

<p>Memoize::Expire is a layer of software that you can insert in between Memoize itself and whatever underlying package implements the cache. The layer presents a hash variable whose values expire whenever they get too old, have been used too often, or both. You tell <code>Memoize</code> to use this forgetful hash as its cache instead of the default, which is an ordinary hash.</p>

<p>To specify a real-time timeout, supply the <code>LIFETIME</code> option with a numeric value. Cached data will expire after this many seconds, and will be looked up afresh when it expires. When a data item is looked up afresh, its lifetime is reset.</p>

<p>If you specify <code>NUM_USES</code> with an argument of <i>n</i>, then each cached data item will be discarded and looked up afresh after the <i>n</i>th time you access it. When a data item is looked up afresh, its number of uses is reset.</p>

<p>If you specify both arguments, data will be discarded from the cache when either expiration condition holds.</p>

<p>Memoize::Expire uses a real hash internally to store the cached data. You can use the <code>HASH</code> option to Memoize::Expire to supply a tied hash in place of the ordinary hash that Memoize::Expire will normally use. You can use this feature to add Memoize::Expire as a layer in between a persistent disk hash and Memoize. If you do this, you get a persistent disk cache whose entries expire automatically. For example:</p>

<pre><code>  #   Memoize
  #      |
  #   Memoize::Expire  enforces data expiration policy
  #      |
  #   DB_File  implements persistence of data in a disk file
  #      |
  #   Disk file

  use Memoize;
  use Memoize::Expire;
  use DB_File;

  # Set up persistence
  tie my %disk_cache =&gt; &#39;DB_File&#39;, $filename, O_CREAT|O_RDWR, 0666];

  # Set up expiration policy, supplying persistent hash as a target
  tie my %cache =&gt; &#39;Memoize::Expire&#39;, 
	  	     LIFETIME =&gt; $lifetime,    # In seconds
		     NUM_USES =&gt; $n_uses,
                     HASH =&gt; \%disk_cache; 

  # Set up memoization, supplying expiring persistent hash for cache
  memoize &#39;function&#39;, SCALAR_CACHE =&gt; [ HASH =&gt; \%cache ];</code></pre>

<h1 id="INTERFACE"><a class="permalink" href="./Memoize::Expire.html#INTERFACE">#</a>INTERFACE</h1>

<p>There is nothing special about Memoize::Expire. It is just an example. If you don&#39;t like the policy that it implements, you are free to write your own expiration policy module that implements whatever policy you desire. Here is how to do that. Let us suppose that your module will be named MyExpirePolicy.</p>

<p>Short summary: You need to create a package that defines four methods:</p>

<dl>

<dt id="TIEHASH"><a class="permalink" href="./Memoize::Expire.html#TIEHASH">#</a>TIEHASH</dt>
<dd>

<p>Construct and return cache object.</p>

</dd>
<dt id="EXISTS"><a class="permalink" href="./Memoize::Expire.html#EXISTS">#</a>EXISTS</dt>
<dd>

<p>Given a function argument, is the corresponding function value in the cache, and if so, is it fresh enough to use?</p>

</dd>
<dt id="FETCH"><a class="permalink" href="./Memoize::Expire.html#FETCH">#</a>FETCH</dt>
<dd>

<p>Given a function argument, look up the corresponding function value in the cache and return it.</p>

</dd>
<dt id="STORE"><a class="permalink" href="./Memoize::Expire.html#STORE">#</a>STORE</dt>
<dd>

<p>Given a function argument and the corresponding function value, store them into the cache.</p>

</dd>
<dt id="CLEAR"><a class="permalink" href="./Memoize::Expire.html#CLEAR">#</a>CLEAR</dt>
<dd>

<p>(Optional.) Flush the cache completely.</p>

</dd>
</dl>

<p>The user who wants the memoization cache to be expired according to your policy will say so by writing</p>

<pre><code>tie my %cache =&gt; &#39;MyExpirePolicy&#39;, args...;
memoize &#39;function&#39;, SCALAR_CACHE =&gt; [HASH =&gt; \%cache];</code></pre>

<p>This will invoke <code>MyExpirePolicy-&gt;TIEHASH(args)</code>. MyExpirePolicy::TIEHASH should do whatever is appropriate to set up the cache, and it should return the cache object to the caller.</p>

<p>For example, MyExpirePolicy::TIEHASH might create an object that contains a regular Perl hash (which it will to store the cached values) and some extra information about the arguments and how old the data is and things like that. Let us call this object `C&#39;.</p>

<p>When Memoize needs to check to see if an entry is in the cache already, it will invoke <code>C-&gt;EXISTS(key)</code>. <code>key</code> is the normalized function argument. MyExpirePolicy::EXISTS should return 0 if the key is not in the cache, or if it has expired, and 1 if an unexpired value is in the cache. It should <i>not</i> return <code>undef</code>, because there is a bug in some versions of Perl that will cause a spurious FETCH if the EXISTS method returns <code>undef</code>.</p>

<p>If your EXISTS function returns true, Memoize will try to fetch the cached value by invoking <code>C-&gt;FETCH(key)</code>. MyExpirePolicy::FETCH should return the cached value. Otherwise, Memoize will call the memoized function to compute the appropriate value, and will store it into the cache by calling <code>C-&gt;STORE(key, value)</code>.</p>

<p>Here is a very brief example of a policy module that expires each cache item after ten seconds.</p>

<pre><code>	package Memoize::TenSecondExpire;

	sub TIEHASH {
	  my ($package, %args) = @_;
          my $cache = $args{HASH} || {};
	  bless $cache =&gt; $package;
	}

	sub EXISTS {
	  my ($cache, $key) = @_;
	  if (exists $cache-&gt;{$key} &amp;&amp; 
              $cache-&gt;{$key}{EXPIRE_TIME} &gt; time) {
	    return 1
	  } else {
	    return 0;  # Do NOT return `undef&#39; here.
	  }
	}

	sub FETCH {
	  my ($cache, $key) = @_;
	  return $cache-&gt;{$key}{VALUE};
	}

	sub STORE {
	  my ($cache, $key, $newvalue) = @_;
	  $cache-&gt;{$key}{VALUE} = $newvalue;
	  $cache-&gt;{$key}{EXPIRE_TIME} = time + 10;
	}</code></pre>

<p>To use this expiration policy, the user would say</p>

<pre><code>	use Memoize;
        tie my %cache10sec =&gt; &#39;Memoize::TenSecondExpire&#39;;
	memoize &#39;function&#39;, SCALAR_CACHE =&gt; [HASH =&gt; \%cache10sec];</code></pre>

<p>Memoize would then call <code>function</code> whenever a cached value was entirely absent or was older than ten seconds.</p>

<p>You should always support a <code>HASH</code> argument to <code>TIEHASH</code> that ties the underlying cache so that the user can specify that the cache is also persistent or that it has some other interesting semantics. The example above demonstrates how to do this, as does <code>Memoize::Expire</code>.</p>

<p>Another sample module, <a href="./Memoize::Saves.html">Memoize::Saves</a>, is available in a separate distribution on CPAN. It implements a policy that allows you to specify that certain function values would always be looked up afresh. See the documentation for details.</p>

<h1 id="ALTERNATIVES"><a class="permalink" href="./Memoize::Expire.html#ALTERNATIVES">#</a>ALTERNATIVES</h1>

<p>Brent Powers has a <code>Memoize::ExpireLRU</code> module that was designed to work with Memoize and provides expiration of least-recently-used data. The cache is held at a fixed number of entries, and when new data comes in, the least-recently used data is expired. See <a href="http://search.cpan.org/search?mode=module&amp;query=ExpireLRU">http://search.cpan.org/search?mode=module&amp;query=ExpireLRU</a>.</p>

<p>Joshua Chamas&#39;s Tie::Cache module may be useful as an expiration manager. (If you try this, let me know how it works out.)</p>

<p>If you develop any useful expiration managers that you think should be distributed with Memoize, please let me know.</p>

<h1 id="CAVEATS"><a class="permalink" href="./Memoize::Expire.html#CAVEATS">#</a>CAVEATS</h1>

<p>This module is experimental, and may contain bugs. Please report bugs to the address below.</p>

<p>Number-of-uses is stored as a 16-bit unsigned integer, so can&#39;t exceed 65535.</p>

<p>Because of clock granularity, expiration times may occur up to one second sooner than you expect. For example, suppose you store a value with a lifetime of ten seconds, and you store it at 12:00:00.998 on a certain day. Memoize will look at the clock and see 12:00:00. Then 9.01 seconds later, at 12:00:10.008 you try to read it back. Memoize will look at the clock and see 12:00:10 and conclude that the value has expired. This will probably not occur if you have <code>Time::HiRes</code> installed.</p>

<h1 id="AUTHOR"><a class="permalink" href="./Memoize::Expire.html#AUTHOR">#</a>AUTHOR</h1>

<p>Mark-Jason Dominus (mjd-perl-memoize+@plover.com)</p>

<p>Mike Cariaso provided valuable insight into the best way to solve this problem.</p>

<h1 id="SEE-ALSO"><a class="permalink" href="./Memoize::Expire.html#SEE-ALSO">#</a><a id="SEE"></a>SEE ALSO</h1>

<p>perl(1)</p>

<p>The Memoize man page.</p>

<p>http://www.plover.com/~mjd/perl/Memoize/ (for news and updates)</p>

<p>I maintain a mailing list on which I occasionally announce new versions of Memoize. The list is for announcements only, not discussion. To join, send an empty message to mjd-perl-memoize-request@Plover.com.</p>


      </div>
      <div id="footer">
        <p>Perldoc Browser is maintained by Dan Book (<a href="https://metacpan.org/author/DBOOK">DBOOK</a>). Please contact him via the <a href="https://github.com/Grinnz/perldoc-browser/issues">GitHub issue tracker</a> or <a href="mailto:dbook@cpan.org">email</a> regarding any issues with the site itself, search, or rendering of documentation.</p>

<p>The Perl documentation is maintained by the Perl 5 Porters in the development of Perl. Please contact them via the <a href="https://github.com/Perl/perl5/issues">Perl issue tracker</a>, the <a href="https://lists.perl.org/list/perl5-porters.html">mailing list</a>, or <a href="https://kiwiirc.com/client/irc.perl.org/p5p">IRC</a> to report any issues with the contents or format of the documentation.</p>


      </div>
    </div>
    <script src="https://cdnjs.cloudflare.com/ajax/libs/jquery/3.5.1/jquery.slim.min.js" integrity="sha512-/DXTXr6nQodMUiq+IUJYCt2PPOUjrHJ9wFrqpJ3XkgPNOZVfMok7cRw6CSxyCQxXn6ozlESsSh1/sMCTF1rL/g==" crossorigin="anonymous"></script>
    <script src="https://cdnjs.cloudflare.com/ajax/libs/popper.js/1.16.1/umd/popper.min.js" integrity="sha512-ubuT8Z88WxezgSqf3RLuNi5lmjstiJcyezx34yIU2gAHonIi27Na7atqzUZCOoY4CExaoFumzOsFQ2Ch+I/HCw==" crossorigin="anonymous"></script>
    <script src="https://stackpath.bootstrapcdn.com/bootstrap/4.5.2/js/bootstrap.min.js" integrity="sha384-B4gt1jrGC7Jh4AgTPSdUtOBvfO8shuf57BaghqFfPlYxofvL8/KUEfYiJOMMV+rV" crossorigin="anonymous"></script>
    <script src="../highlight.pack.js"></script>
    <script>hljs.highlightAll();</script>
  </body>
</html>
